(menu-bar-showhide-fringe-menu-customize-left)

(menu-bar-showhide-fringe-menu-customize-right)
(menu-bar-showhide-fringe-menu-customize-disable):
Use proper calling convention for `customize-set-value'.
Require `fringe' before setting variable.

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index c517cbd060b9a24c8900b6de25e773f551995dd3..4f6dd80bbf7cba37b6d7d16b2d0f163f3493415f 100644 (file)
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -679,7 +679,8 @@ Do the same for the keys of the same name."
 (defun menu-bar-showhide-fringe-menu-customize-left ()
   "Make fringes appear only on the left."
   (interactive)
-  (customize-set-variable 'fringe-mode nil '(nil . 0)))
+  (require 'fringe)
+  (customize-set-variable 'fringe-mode '(nil . 0)))
 
 (define-key menu-bar-showhide-fringe-menu [left]
   '(menu-item "On the Left" menu-bar-showhide-fringe-menu-customize-left
@@ -690,7 +691,8 @@ Do the same for the keys of the same name."
 (defun menu-bar-showhide-fringe-menu-customize-right ()
   "Make fringes appear only on the right."
   (interactive)
-  (customize-set-variable 'fringe-mode nil '(0 . nil)))
+  (require 'fringe)
+  (customize-set-variable 'fringe-mode '(0 . nil)))
 
 (define-key menu-bar-showhide-fringe-menu [right]
   '(menu-item "On the Right" menu-bar-showhide-fringe-menu-customize-right
@@ -701,7 +703,8 @@ Do the same for the keys of the same name."
 (defun menu-bar-showhide-fringe-menu-customize-disable ()
   "Make fringes disappear."
   (interactive)
-  (customize-set-variable 'fringe-mode nil 0))
+  (require 'fringe)
+  (customize-set-variable 'fringe-mode 0))
 
 (define-key menu-bar-showhide-fringe-menu [none]
   '(menu-item "None" menu-bar-showhide-fringe-menu-customize-disable